home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / lang_asm / as1 / mfwd.c < prev    next >
Encoding:
C/C++ Source or Header  |  1986-07-23  |  1.1 KB  |  69 lines
  1. /*
  2.  *      in memory version of forward ref handler
  3.  */
  4.  
  5. #define MAXFWD  500
  6.  
  7. struct fref{
  8.     int     f_fno;  /* file number */
  9.     int     f_line; /* line number */
  10.     };
  11.  
  12. struct fref *Fbase = NULL;
  13. struct fref *Fnext = NULL;
  14. int Fleft = 0;
  15.  
  16. /*
  17.  *      fwdinit --- initialize forward ref array
  18.  */
  19. fwdinit()
  20. {
  21.     char *malloc();
  22.  
  23.     Fbase = (struct fref *)malloc( sizeof(struct fref) * MAXFWD );
  24.     if( Fbase == (struct fref *)NULL )
  25.         fatal("No mem for fwd refs");
  26.     Fnext = Fbase;
  27.     Fleft = MAXFWD-1;
  28. }
  29.  
  30. /*
  31.  *      fwdreinit --- reinitialize forward ref file
  32.  */
  33. fwdreinit()
  34. {
  35.     Fnext->f_fno = Fnext->f_line = 0;
  36.     Fnext = Fbase;
  37.     Ffn = Fnext->f_fno;
  38.     F_ref = Fnext->f_line;
  39.     Fnext++;
  40. }
  41.  
  42. /*
  43.  *      fwdmark --- mark current file/line as containing a forward ref
  44.  */
  45. fwdmark()
  46. {
  47.     if( Fleft != 0 ){
  48.         Fnext->f_fno = Cfn;
  49.         Fnext->f_line = Line_num;
  50.         Fnext++;
  51.         Fleft--;
  52.         }
  53.     else
  54.         error("No space for fwd refs");
  55. }
  56.  
  57. /*
  58.  *      fwdnext --- get next forward ref
  59.  */
  60. fwdnext()
  61. {
  62.     Ffn = Fnext->f_fno;
  63.     F_ref = Fnext->f_line;
  64.     Fnext++;
  65. #ifdef DEBUG
  66.     printf("Next Fwd ref: %d,%d\n",Ffn,F_ref);
  67. #endif
  68. }